package WebService::RallyDev::Iteration;

use strict;
use warnings;

use base qw(Class::Accessor::Faster);

my @columns = qw(State Theme Resources _ref CreationDate _objectVersion StartDate EndDate Notes _refObjectName ObjectID Name);
__PACKAGE__->mk_accessors (@columns);


sub new {
    my $class = shift;
    my $result_hash = shift;

    my $self = $class->_init($result_hash);

    bless $self, $class;

    return $self;
}

sub _init {
    my $class = shift;
    my $hash = shift;

    my $self = $class->SUPER::new($hash);

    return $self;
}

sub id {
    my $self = shift;
    return $self->ObjectID;
}

sub url {
    my $self = shift;
    return $self->_ref;
}


1;

